Public Class DataEntryException
    Inherits ApplicationException

    Sub New(ByVal sMsg As String, ByVal ex As Exception)

        MyBase.New(sMsg, ex)
    End Sub

End Class

Public Class DataNotExistsException
    Inherits ApplicationException

    Sub New(ByVal sMsg As String, ByVal ex As Exception)

        MyBase.New(sMsg, ex)
    End Sub

End Class

